unit Class_GkData;

interface
uses
  Classes,SysUtils;

type
  TGkData=class(TObject)
  private
    FListData:TStringList;
    FZBFLZBLY:string;
  public
    constructor Create;
    destructor Destroy; override;
  published
    property ListData:TStringList read FListData write FListData;
    property ZBFLZBLY:string read  FZBFLZBLY write FZBFLZBLY;
  public
    class procedure InitializeWithWsdl(AValue:string;var AList:TStringList);
    class procedure InitializeWithView(AValue:string;var AList:TStringList);
  end;

implementation

uses
  Class_KzUtils,Class_KzDebug;

constructor TGkData.Create;
begin
  FListData:=TStringList.Create;
end;

destructor TGkData.Destroy;
begin
  FreeAndNil(FListData);
  inherited;
end;


class procedure TGkData.InitializeWithView(AValue: string;
  var AList: TStringList);
begin
  //
end;

class procedure TGkData.InitializeWithWsdl(AValue: string;
  var AList: TStringList);
begin
end;



end.
